Apple Reference & Presen…rary 8 (Internal Edition)/Apple R&P Lib Internal v8.0.iso/5-Fonts & Software/Claris HyperCard 2.1/HyperCard 2.1.sea/Audio Help/background_7507.xml

Extensible Markup Language | 1991-04-23 | 20KB | 406 lines

<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE background PUBLIC "-//Apple, Inc.//DTD background V 2.0//EN" "" >
<background>
    <id>7507</id>
    <filler1>0</filler1>
    <bitmap>BMAP_3785.pbm</bitmap>
    <cantDelete> <true /> </cantDelete>
    <showPict> <true /> </showPict>
    <dontSearch> <false /> </dontSearch>
    <link rel="stylesheet" type="text/css" href="stylesheet_3279.css" />
    <part>
        <id>69</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <true /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>17</left>
            <top>30</top>
            <right>189</right>
            <bottom>124</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Palatino</font>
        <textSize>14</textSize>
        <textStyle>plain</textStyle>
        <textHeight>18</textHeight>
        <name>Main Topics</name>
        <script>on mouseUpselect emptyset cursor to watchlock screenif line (word 2 of the clickLine) of me is empty thenresetMainTopicsCardexit mouseUpend ifput word 2 of the clickLine into topicNumbergo card topicNumbershowRightList falsehiliteTopic topicNumberunlock screenlock screenshowRightList trueunlock screen with visual effect wipe down fastif the mouse is down then exit mouseUp -- trap double clickend mouseUp</script>
    </part>
    <part>
        <id>74</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>18</left>
            <top>8</top>
            <right>256</right>
            <bottom>31</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Helvetica</font>
        <textSize>18</textSize>
        <textStyle>plain</textStyle>
        <textHeight>24</textHeight>
        <name>Title</name>
        <script></script>
    </part>
    <part>
        <id>78</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>7</left>
            <top>68</top>
            <right>177</right>
            <bottom>86</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <true /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Palatino</font>
        <textSize>14</textSize>
        <textStyle>plain</textStyle>
        <name>Hiliter</name>
        <script>on mouseUppass mouseUpend mouseUp</script>
    </part>
    <part>
        <id>80</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <true /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>27</left>
            <top>146</top>
            <right>250</right>
            <bottom>259</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <true /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Palatino</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>15</textHeight>
        <name>Section</name>
        <script>-- ∆ The maximum number of lines that a subtopic can use is two.-- To continue the name of a subtopic onto the next line,-- simply put a tab character into the first character of the second-- line. This script looks for that tab character and adjusts-- accordingly.on mouseUp-- Go to the section clicked on.visual effect zoom output word 2 of the clickLine into startLineif tab is in line startLine of me then-- The previous line is a continuation of the line clicked.put startLine into nextLinesubtract 1 from startLineelseif tab is in line (startLine + 1) of me then-- The next line is a continuation of the line clicked.put (startLine + 1) into nextLineelse-- The line clicked is a complete section name.put empty into nextLineend ifend ifselectWholeLine startLine,the name of me,nextLinewait 5put getSectionName(line startLine of me) into cardNamegoCard cardNameend mouseUpfunction getSectionName whichSectionget number of words in whichSectionput word 2 to it of whichSection into whichSectionif last char of whichSection is return thendelete last char of whichSectionend ifreturn whichSectionend getSectionName</script>
    </part>
    <part>
        <id>85</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>91</left>
            <top>269</top>
            <right>170</right>
            <bottom>288</bottom>
        </rect>
        <style>rectangle</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Palatino</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Quick View</name>
        <script>on mouseUpvisual effect wipe up fastgoBalloonsend mouseUp</script>
    </part>
    <part>
        <id>86</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>172</left>
            <top>269</top>
            <right>243</right>
            <bottom>288</bottom>
        </rect>
        <style>rectangle</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Palatino</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Overview</name>
        <script>on mouseUpvisual effect wipe up fastgoOverviewend mouseUp</script>
    </part>
    <part>
        <id>88</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>13</left>
            <top>269</top>
            <right>89</right>
            <bottom>288</bottom>
        </rect>
        <style>rectangle</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Palatino</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Leave Help</name>
        <script>on mouseUpleaveHelpend mouseUp</script>
    </part>
    <part>
        <id>79</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>27</left>
            <top>129</top>
            <right>250</right>
            <bottom>149</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <true /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>10</textSize>
        <textStyle>plain</textStyle>
        <textHeight>13</textHeight>
        <name>Instruction 2</name>
        <script>on mouseUpbeepend mouseUp</script>
    </part>
    <part>
        <id>89</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>0</left>
            <top>125</top>
            <right>256</right>
            <bottom>259</bottom>
        </rect>
        <style>opaque</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Section Cover</name>
        <script></script>
    </part>
    <part>
        <id>90</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>41</left>
            <top>239</top>
            <right>219</right>
            <bottom>260</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>LastDate</name>
        <script></script>
    </part>
    <part>
        <id>93</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>12</left>
            <top>127</top>
            <right>132</right>
            <bottom>149</bottom>
        </rect>
        <style>roundrect</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ProtoNormalBtn</name>
        <script>on mouseUpput putSoundNameHere into theSoundName --we stick the actual sound name into "putSoundNameHere"if the CommandKey is "down" thenanswer "Are you sure you want to delete" && quote & theSoundName & quote & "?"¬ --∆with "No" or "Yes"  --∆if it is "Yes" then --∆set cursor to watchdeleteMeexit mouseUpend ifset the hilite of me to falseelseif ":Audio Help" & return is in the stacksInUse & return then --∆if not SndExists(theSoundName) thenanswer "The sound associated with this button has been deleted."&&¬ --∆" Would you like to delete the button as well?"¬ --∆with "No" or "Yes" --∆if it is "Yes" then deleteMe --∆set the hilite of me to falseexit mouseUpend ifend ifplay theSoundNameif the sound is not theSoundName thenanswer "Sound" && quote & theSoundName & quote && "cannot be played." --∆set the hilite of me to falseexit mouseUpend ifset the hilite of me to truerepeat until the sound is doneif the mouse is down then play stopend repeatset the hilite of me to falseend ifend mouseUpon mouseDownif the OptionKey is down thenrepeat until the mouse is upset the loc of me to the mouselocend repeatget the rect of this cardif the loc of me is not within it thenput the height of this card div 2 into vertput the width of this card div 2 into horset the loc of me to hor,vertend ifexit to hypercardelseput false into OldStateput true into NewState -- in case the click was really fastset the hilite of me to truerepeat until the mouse is upput the mouseLoc is within the rect of me into NewStateif NewState ≠ OldState thenset the hilite of me to NewStateput NewState into OldStateend ifend repeatif not NewState thenset hilite of me to falseexit to hypercardend ifend ifend mouseDownon deleteMeglobal APHasEdit,APHasWaveEditput the short name of me into btnNameput the long name of this stack into stakNamedelete the first word of btnNamedelete the first word of stakNamedelete the first char of stakNamedelete the last char of stakNamelock screenif APHasEdit is true thenif APHasWaveEdit is true then put "Clear" into menuItem 6 of menu 3  --∆send "tempGiveUpEdit" to window "AudioPalette"end ifget the userlevelset the userlevel to 5select mesend "doMenu Clear Button" to HyperCardchoose browse toolset the userlevel to itif APHasEdit is true thenif APHasWaveEdit is true then put "Clear Sound" into menuitem 6 of menu 3  --∆send "tempTakeBackEdit" to window "AudioPalette"end ifunlock screenif ":Audio Help" & return is in the stacksInUse & return --∆then deleteSnd stakName, btnNameif there is a window "AudioPalette" then send "update" to window "AudioPalette"end deleteMe</script>
    </part>
    <part>
        <id>94</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>13</left>
            <top>164</top>
            <right>33</right>
            <bottom>181</bottom>
        </rect>
        <style>opaque</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>29183</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>ProtoApptBtn</name>
        <script>on mouseupput (":Audio Help" & return) is in (the stacksInUse & return) into InRealm  --∆put putSoundNameHere into theSoundName --I stick the actual sound name into "putSoundNameHere"if the CommandKey is down thenanswer "Are you sure you want to delete" ¬&& quote & theSoundName & quote & "?" with "No" or "Yes" --∆if it is "Yes" then --∆set cursor to watchdeleteMeresetAPMenusend ifelseif InRealm thenif not SndExists(theSoundName) thenanswer "The sound associated with this button has been deleted."&&¬ --∆" Would you like to delete the button as well?"¬ --∆with "No" or "Yes" --∆if it is "Yes" then --∆set cursor to watchdeleteMeend ifUpdateAnnoteMenusexit mouseUpend ifend ifplay stopplay theSoundNameif the sound is not theSoundName thenanswer "Sound" && quote & theSoundName & quote && "cannot be played." --∆end ifend ifif InRealm then UpdateAnnoteMenusend mouseupon mousedownput (":Audio Help" & return) is in (the stacksInUse & return) into InRealm --∆put the number of me into mynumif the ShiftKey is down thenset the hilite of me to not the hilite of meif InRealm then UpdateAnnoteMenusexit to hypercardelseset the hilite of me to trueget number of btnsif InRealm thenrepeat with i = 1 to itif not IsSoundButton(i) then next repeatif i ≠ myNum then set the hilite of btn i to falseend repeatend ifend ifif the optionKey is down thenrepeat until the mouse is upset the loc of me to the mouselocend repeatget the rect of this cardif the loc of me is not within it thenput the height of this card div 2 into vertput the width of this card div 2 into horset the loc of me to hor,vertend ifif InRealm then UpdateAnnoteMenusexit to hypercardend ifend mousedownon deleteMe IncludeSoundglobal APHasEdit,APHasWaveEditput line 1 of the short name of me into butNameput the long name of this stack into stakNamedelete the first word of stakNamedelete the first char of stakNamedelete the last char of stakNamelock screenif APHasEdit is true thenif APHasWaveEdit is true then put "Clear" into menuItem 6 of menu 3  --∆send "tempGiveUpEdit" to window "AudioPalette"end ifget the userlevelset the userlevel to 5select mesend "doMenu Clear Button" to HyperCardchoose browse toolset the userlevel to itif APHasEdit is true thenif APHasWaveEdit is true then put "Clear Sound" into menuitem 6 of menu 3  --∆send "tempTakeBackEdit" to window "AudioPalette"end ifunlock screenif IncludeSound ≠ "noSound" then deleteSnd stakName, butNameif there is a window "AudioPalette"then send "update" to window "AudioPalette"end deleteMe</script>
    </part>
    <content>
        <layer>background</layer>
        <id>69</id>
        <text>Audio Palette BasicsAbout SoundUsing Sound in StacksEditing SoundRecording Features</text>
    </content>
    <content>
        <layer>background</layer>
        <id>74</id>
        <text>Main Topics for Audio Help</text>
    </content>
    <content>
        <layer>background</layer>
        <id>79</id>
        <text>Click a subtopic to go to it:</text>
    </content>
    <name>Main Topics</name>
    <script>∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞Script from background: Main TopicsTHE MESSAGE HANDLERS IN THIS SCRIPT:resumeStack,openBackground,closeBackground,openCard,mouseUp,showLeaveButton,setCheckMark,resetMainTopicsCard,showRightList,hiliteTopicTHE FUNCTION HANDLERS IN THIS SCRIPT:<none>∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞∞----------•• SYSTEM MESSAGES ••---------on resumeStackshowLeaveButtonpass resumeStackend resumeStackon openBackgroundsetCheckMark trueshowLeaveButtonpass openBackgroundend openBackgroundon closeBackgroundsetCheckMark falsepass closeBackgroundend closeBackgroundon openCardhiliteTopic (the number of this card)showRightList truepass openCardend openCardon mouseUpresetMainTopicsCardend mouseUp----------•• MESSAGE HANDLERS ••----------on showLeaveButton-- Show the button "Leave Help" if the user only has one stack window-- open; otherwise hide it.get (number of lines in the stacks is 1)-- ∆ Localize: the name of this button.set the visible of bkgnd button "Leave Help" to itend showLeaveButtonon setCheckMark boolean-- Set the menu bar for this background.setLocationCheckMark 1,booleanend setCheckMarkon resetMainTopicsCard-- Hide all objects pertaining to the right-hand list.lock screengo card 1showRightList falseunlock screen with visual effect wipe up fastend resetMainTopicsCardon showRightList boolean-- Show or hide all objects for the right-hand listset the showPict of this card to booleanset visible of bkgnd button "Hiliter" to booleanset visible of bkgnd field "Instruction 2" to booleanset visible of bkgnd field "Section" to booleanset visible of bkgnd button "Section Cover" to not booleanend showRightListon hiliteTopic topicNumber-- Show and move the Hiliter button.-- topicNumber is an integer, the number of the line in the Main Topics-- to be highlighted.put "Main Topics" into whichFieldget (top of bkgnd field whichField + (topicNumber * ¬the textHeight of bkgnd field whichField) + 2)set the bottom of bkgnd button "Hiliter" to itshow bkgnd button "Hiliter"end hiliteTopic</script>
</background>